home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 December / Chip_2001-12_cd1.bin / zkuste / tuning / download / xteq / setup.exe / {app} / plugins / XQ WinNT Load Balance.xpl < prev    next >
Text File  |  2001-04-26  |  1KB  |  45 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="6"
  3. "COUNT"="1"
  4. "UIPATH"="Network\Network Interface"
  5. "NAME"="Automatic Load Balancing"
  6. "VERSION"="1.12"
  7. "OSVERSION"="010101"
  8. "LANGUAGE"="VBScript"
  9. "TEXT 1"="Enable Load Balancing"
  10. "DESCRIPTION 1"="For WinNT/Win2000/XP: For systems with 2 Network Cards [NICs]."
  11. "DESCRIPTION 2"="Checking Box enables Load Balancing; Unchecking [clearing] Box will disable Load Balancing."
  12. "AUTHOR"="Ojatex@aol.com"
  13. "CONTACTURL"="http://members.aol.com/ojatex/"
  14. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  15. "COMMENT 1"="For X-Setup program information, go to http://www.xteq.com."
  16. "COMMENT 2"="Thanks to CptSiskoX for the tip."
  17.  
  18. sP="HKLM\System\CurrentControlSet\Services\NetBT\Parameters\RandomAdapter" 'Dword 1=enable 0=disable
  19. sP1="HKLM\System\CurrentControlSet\Services\NetBT\Parameters\SingleResponse" 'Dword 1=enable 0=disable
  20.  
  21.  
  22. Sub Plugin_Initialize 
  23.   i=RegReadValue(sP)
  24.   if i=1 then SetUIElement 1,true
  25. End Sub
  26.  
  27. Sub Plugin_CheckData(ElementIndex)
  28. End Sub
  29.  
  30. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  31.   b=GetUIElement(1)
  32.  if b=true then
  33.     Call RegWriteValue(sP,1,2)
  34.     Call RegWriteValue(sP1,1,2) 
  35. else
  36.     if RegValueExists(sP) then Call RegDeleteValue(sP)
  37.     if RegValueExists(sP1) then Call RegDeleteValue(sP1)
  38.  end if
  39.  
  40. End Sub
  41.  
  42. Sub Plugin_Terminate 
  43. End Sub
  44.  
  45.